home *** CD-ROM | disk | FTP | other *** search
- 10 poke53280,0:poke53281,0
- 15 gosub 100
- 20 print"[147] "
- 30 sys13344
- 40 print"[147][144]load"chr$(34)"heisse luft"chr$(34)",8":print"run"
- 50 poke198,3:poke631,13:poke632,13:poke633,13:print"";
- 60 end
- 100 fori=832to832+33:reada:pokei,a:next
- 110 data120,169,51,133,1,169,0,133,95,133,90,133,88,169,208,133,96,169,240
- 115 data133,89,169,224,133,91,32,191,163,169,55,133,1,88,96
- 120 sys832:poke850,160:sys832
- 125 poke56576,peek(56576)and252
- 130 poke53272,8
- 135 poke648,192:poke2,255
- 145 poke53270,peek(53270)or16
- 150 poke53283,09:poke53282,11
- 200 return
-